100 REM PROGRAMM ZUR DEFINITION EINES
110 REM NLQ-ZEICHENS AUF DEM LX 400
120 :
130 OPEN 4,4
140 PRINT#4,CHR$(27);CHR$(120);CHR$(1);
150 REM * UMSCHALTUNG NLQ *
160 :
170 PRINT#4,CHR$(27);":";CHR$(0)CHR$(0)CHR$(0);
180 REM * KOPIERT ROM INS RAM *
190 :
200 PRINT#4,CHR$(27);"%";CHR$(1);
210 REM * UMSCHALTEN AUF BENUTZER *
220 :
230 REM   GOTO310
240 PRINT#4,CHR$(27);"&";CHR$(0);"??";CHR$(128)
250 REM * ZEICHEN EINLEITEN *
260 :
270 :
280 FORI=1TO36
290 READM
300 PRINT#4,CHR$(M);
310 NEXTI
320 PRINT#4,CHR$(0);
330 PRINT#4,"OMEGA : ";
340 FORI=1TO10
350 PRINT#4,"? ";
360 NEXT
370 PRINT#4
380 CLOSE4:END
390 REM DATEN DES NLQ-ZEICHENS
400 :
410 :
420 DATA 170,255,255
430 DATA 170,128,  1
440 DATA 170,128,  1
450 DATA 170,128,  1
460 DATA 170,128,  1
470 DATA 170,128,  1
480 DATA 170,128,  1
490 DATA 170,128,  1
500 DATA 170,128,  1
510 DATA 170,255,255
520 DATA   0,  0,  0
530 DATA   0,  0,  0
540 DATA 0